home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Celestin Apprentice 4
/
Apprentice-Release4.iso
/
Languages
/
Caml Light 0.7
/
Caml Light 0.7 source
/
src
/
tools
/
fakelink
< prev
next >
Wrap
Text File
|
1995-07-03
|
709b
|
35 lines
# FakeLink -- "build" an empty file to give to "fatmerge" to make a lean binary.
# This script tries to ignore all but the relevant options, so that it can
# replace a linker without changing the makefiles.
# This can fail if the name of a file given to the linker is "-o", "-c",
# or "-t".
set echo 0
set output link.out
set creator '????'
set type 'APPL'
loop
break if {#} == 0
if "{1}" == "-o"
set output "{2}"
shift
else if "{1}" == "-c"
set creator "{2}"
shift
else if "{1}" == "-t"
set type "{2}"
shift
end
shift
end
delete -i "{output}"
if "{creator}" == "????"
rez -t "{type}" -o "{output}" <dev:null
else
rez -c "{creator}" -t "{type}" -o "{output}" <dev:null
end